home *** CD-ROM | disk | FTP | other *** search
/ HamCall (October 1991) / HamCall (Whitehall Publishing)(1991).bin / bcast / bcstcble / fmamps.asc < prev    next >
Text File  |  1990-10-14  |  821b  |  23 lines
  1. 10    'INDIRECT FM POWER PROGRAM
  2. 20    PRINT"This program will calculate your PA current via ";
  3. 30    PRINT"the indirect method."
  4. 40    INPUT "Transmitter efficiency in decimal is ";EF
  5. 50    INPUT "ERP Licensed power in watts in decimal is ";LP
  6. 60    INPUT "Antenna power gain ( not dB gain) is ";G
  7. 70    INPUT "Coax system efficiency in decimal is ";LEF
  8. 80    PRINT
  9. 90    PRINT "What is the plate voltage "
  10. 100   INPUT E
  11. 110   LPRINT "Efficiency is ";EF*100
  12. 120   LPRINT "ERP is ";LP ;" watts"
  13. 130   LPRINT "Antenna power gain is ";G
  14. 140   LPRINT "Coax system eficiency is ";LEF*100
  15. 150   LPRINT
  16. 160   LPRINT" PERCENT      PA CURRENT"
  17. 170   FOR K = 0 TO 15
  18. 180   P=LP*.9+K*LP/100
  19. 190   LPRINT 90+K,P/EF/G/LEF/E
  20. 200   NEXT K
  21. 210   INPUT "Run again "; A$: IF LEFT$(A$,1)= "Y" THEN GOTO 10
  22. 220   END
  23.